home *** CD-ROM | disk | FTP | other *** search
-
- ; HLink Application Transmission Script
- ; MegaLosound - script
-
- failat 21
-
- if exists work:applic/MegaLoSound/MegaLoSound
-
- else
- if exists d:MegaloSound.Lha
- else
- ;remove rest of MegaLoSound from the system
- cd work:applic
- del MegaLo#? all
-
- ;Send archive & send script
- com "send NScript:megaLoSound.remote d:" >> hl:execute
- wait 2
- echo "run > nil: execute D:MegaLoSound.remote" >> hl:execute
-
- ;Wait for receive MegaLoSound archive
- lab LOOP
- if exists d:megaLoSound.lha
- else
- skip LOOP back
- endif
- wait 1
- endif
-
- wait 1
- echo "Unpacking Application to Work:Applic/ ... "
- wait 1
- lha x -T d:megaLoSound.lha work:applic/
- Move Work:Applic/MegaLoConfig.Dat Work:Applic/megaLoSound/
- wait 4
-
- endif
-
- cd work:applic/megalosound/
- run > nil: MegaLoSound
-
-
-
-
-
-
-
-
-
-
-